|
|
 |
|
|
|
|
112: 'Syntax: Set x.pBookmark = Form1
113: Set mvarpBookmark = vData
114: End Property
115:
116:
117: '##ModelId=352AB4E00064
118: Public Property Get pBookmark() As Variant
119: 'used when retrieving value of a property, on the right side of an assignment.
120: 'Syntax: Debug.Print X.pBookmark
121: If IsObject(mvarpBookmark) Then
122: Set pBookmark = mvarpBookmark
123: Else
124: pBookmark = mvarpBookmark
125: End If
126: End Property
127:
128:
129:
130: '##ModelId=352AB4E103CA
131: Public Property Let ChangedByCode(ByVal vData As Boolean)
132: 'used when assigning a value to the property, on the left side of an assignment.
133: 'Syntax: X.ChangedByCode = 5
134: mvarChangedByCode = vData
135: End Property
136:
137:
138: '##ModelId=352AB4E101E0
139: Public Property Get ChangedByCode() As Boolean
140: 'used when retrieving value of a property, on the right side of an assignment.
141: 'Syntax: Debug.Print X.ChangedByCode
142: ChangedByCode = mvarChangedByCode
143: End Property
144:
145:
146:
147: '##ModelId=352AB4E202B2
148: Public Property Let hasBeenAdded(ByVal vData As Boolean)
149: 'used when assigning a value to the property, on the left side of an assignment.
150: 'Syntax: X.hasBeenAdded = 5
151: mvarhasBeenAdded = vData
152: End Property
153:
154:
155: '##ModelId=352AB4E2019A
156: Public Property Get hasBeenAdded() As Boolean
$ch:0001
|
|
|
|
|
|